PC Home 109/PC Home 109.iso/data1.cab/Program_Files/id007.dxr/00053.ls

Text File | 2001-03-02 | 879 b | 25 lines

on exitFrame
  set LastTick to the ticks
  repeat while the locH of sprite 5 < 203
    set x to 1 * (the ticks - LastTick)
    set LastTick to the ticks
    set the locH of sprite 6 to the locH of sprite 6 + x
    set the locH of sprite 7 to the locH of sprite 7 + x
    set the locH of sprite 5 to the locH of sprite 5 + x
    set the locH of sprite 4 to the locH of sprite 4 + random(2)
    set the locH of sprite 4 to the locH of sprite 4 - random(2)
    set the locH of sprite 8 to the locH of sprite 8 + random(2)
    set the locH of sprite 8 to the locH of sprite 8 - random(2)
    set the locV of sprite 8 to the locV of sprite 8 + random(2)
    set the locV of sprite 8 to the locV of sprite 8 - random(2)
    updateStage()
  end repeat
end

on mouseUp
  set the visible of sprite 5 to 0
  set the visible of sprite 6 to 0
  set the visible of sprite 7 to 0
  go(81)
end